home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_129657.txt < prev    next >
Text File  |  1990-08-14  |  7KB  |  396 lines
  1. -- card: 129657 from stack: in
  2. -- bmap block id: 130026
  3. -- flags: 4000
  4. -- background id: 14625
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on doMenu menuItem
  8.   if menuItem is "Reserve" then
  9.     show card field "Reserved"
  10.   else pass doMenu
  11. end doMenu
  12.  
  13. on groupThree
  14.   repeat with index = 3 to 14
  15.     set hilite of card button id index to false
  16.   end repeat
  17.   set hilite of target to true
  18. end groupThree
  19.  
  20. on resetCard
  21.   set hilite of card button id 3 to true
  22.   repeat with index = 4 to 14
  23.     set hilite of card button id index to false
  24.   end repeat
  25.   hide card field "Reserved"
  26. end resetCard
  27.  
  28.  
  29. -- part 15 (field)
  30. -- low flags: 81
  31. -- high flags: 0001
  32. -- rect: left=225 top=189 right=201 bottom=282
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 3
  37. -- text size: 9
  38. -- style flags: 0
  39. -- line height: 12
  40. -- part name: Reserved
  41.  
  42.  
  43. -- part 1 (button)
  44. -- low flags: 00
  45. -- high flags: 0000
  46. -- rect: left=0 top=0 right=342 bottom=512
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 1
  50. -- font id: 0
  51. -- text size: 12
  52. -- style flags: 0
  53. -- line height: 16
  54. -- part name: 
  55.  
  56.  
  57. -- part 2 (button)
  58. -- low flags: 00
  59. -- high flags: 0000
  60. -- rect: left=27 top=31 right=46 bottom=42
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 5068 / 5068
  63. -- text alignment: 1
  64. -- font id: 0
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: Close
  69. ----- HyperTalk script -----
  70. on mouseDown
  71.   set icon of me to "Close Box Hi"
  72. end mouseDown
  73.  
  74. on mouseLeave
  75.   set icon of me to "Close Box"
  76. end mouseLeave
  77.  
  78. on mouseUp
  79.   set icon of me to "Close Box"
  80.   lock screen
  81.   resetCard
  82.   pop card
  83.   unlock screen
  84. end mouseUp
  85.  
  86.  
  87. -- part 3 (button)
  88. -- low flags: 00
  89. -- high flags: 4000
  90. -- rect: left=117 top=92 right=131 bottom=206
  91. -- title width / last selected line: 0
  92. -- icon id / first selected line: 0 / 0
  93. -- text alignment: 1
  94. -- font id: 0
  95. -- text size: 12
  96. -- style flags: 0
  97. -- line height: 16
  98. -- part name: 
  99. ----- HyperTalk script -----
  100. on mouseUp
  101.   groupThree
  102. end mouseUp
  103.  
  104.  
  105.  
  106. -- part 4 (button)
  107. -- low flags: 00
  108. -- high flags: 0000
  109. -- rect: left=117 top=134 right=173 bottom=206
  110. -- title width / last selected line: 0
  111. -- icon id / first selected line: 0 / 0
  112. -- text alignment: 1
  113. -- font id: 0
  114. -- text size: 12
  115. -- style flags: 0
  116. -- line height: 16
  117. -- part name: 
  118. ----- HyperTalk script -----
  119. on mouseUp
  120.   groupThree
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 5 (button)
  126. -- low flags: 00
  127. -- high flags: 0000
  128. -- rect: left=117 top=176 right=215 bottom=206
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: 
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   groupThree
  140. end mouseUp
  141.  
  142.  
  143.  
  144. -- part 6 (button)
  145. -- low flags: 00
  146. -- high flags: 0000
  147. -- rect: left=117 top=218 right=257 bottom=206
  148. -- title width / last selected line: 0
  149. -- icon id / first selected line: 0 / 0
  150. -- text alignment: 1
  151. -- font id: 0
  152. -- text size: 12
  153. -- style flags: 0
  154. -- line height: 16
  155. -- part name: 
  156. ----- HyperTalk script -----
  157. on mouseUp
  158.   groupThree
  159. end mouseUp
  160.  
  161.  
  162.  
  163. -- part 7 (button)
  164. -- low flags: 00
  165. -- high flags: 0000
  166. -- rect: left=209 top=92 right=131 bottom=298
  167. -- title width / last selected line: 0
  168. -- icon id / first selected line: 0 / 0
  169. -- text alignment: 1
  170. -- font id: 0
  171. -- text size: 12
  172. -- style flags: 0
  173. -- line height: 16
  174. -- part name: 
  175. ----- HyperTalk script -----
  176. on mouseUp
  177.   groupThree
  178. end mouseUp
  179.  
  180.  
  181.  
  182. -- part 8 (button)
  183. -- low flags: 00
  184. -- high flags: 0000
  185. -- rect: left=209 top=134 right=173 bottom=298
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 0 / 0
  188. -- text alignment: 1
  189. -- font id: 0
  190. -- text size: 12
  191. -- style flags: 0
  192. -- line height: 16
  193. -- part name: 
  194. ----- HyperTalk script -----
  195. on mouseUp
  196.   groupThree
  197. end mouseUp
  198.  
  199.  
  200.  
  201. -- part 9 (button)
  202. -- low flags: 00
  203. -- high flags: 0000
  204. -- rect: left=209 top=176 right=215 bottom=298
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 0 / 0
  207. -- text alignment: 1
  208. -- font id: 0
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: 
  213. ----- HyperTalk script -----
  214. on mouseUp
  215.   groupThree
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part 10 (button)
  221. -- low flags: 00
  222. -- high flags: 0000
  223. -- rect: left=209 top=218 right=257 bottom=298
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 0 / 0
  226. -- text alignment: 1
  227. -- font id: 0
  228. -- text size: 12
  229. -- style flags: 0
  230. -- line height: 16
  231. -- part name: 
  232. ----- HyperTalk script -----
  233. on mouseUp
  234.   groupThree
  235. end mouseUp
  236.  
  237.  
  238.  
  239. -- part 11 (button)
  240. -- low flags: 00
  241. -- high flags: 0000
  242. -- rect: left=301 top=92 right=131 bottom=390
  243. -- title width / last selected line: 0
  244. -- icon id / first selected line: 0 / 0
  245. -- text alignment: 1
  246. -- font id: 0
  247. -- text size: 12
  248. -- style flags: 0
  249. -- line height: 16
  250. -- part name: 
  251. ----- HyperTalk script -----
  252. on mouseUp
  253.   groupThree
  254. end mouseUp
  255.  
  256.  
  257.  
  258. -- part 12 (button)
  259. -- low flags: 00
  260. -- high flags: 0000
  261. -- rect: left=301 top=134 right=173 bottom=390
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 0 / 0
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 12
  267. -- style flags: 0
  268. -- line height: 16
  269. -- part name: 
  270. ----- HyperTalk script -----
  271. on mouseUp
  272.   groupThree
  273. end mouseUp
  274.  
  275.  
  276.  
  277. -- part 13 (button)
  278. -- low flags: 00
  279. -- high flags: 0000
  280. -- rect: left=301 top=176 right=215 bottom=390
  281. -- title width / last selected line: 0
  282. -- icon id / first selected line: 0 / 0
  283. -- text alignment: 1
  284. -- font id: 0
  285. -- text size: 12
  286. -- style flags: 0
  287. -- line height: 16
  288. -- part name: 
  289. ----- HyperTalk script -----
  290. on mouseUp
  291.   groupThree
  292. end mouseUp
  293.  
  294.  
  295.  
  296. -- part 14 (button)
  297. -- low flags: 00
  298. -- high flags: 0000
  299. -- rect: left=301 top=218 right=257 bottom=390
  300. -- title width / last selected line: 0
  301. -- icon id / first selected line: 0 / 0
  302. -- text alignment: 1
  303. -- font id: 0
  304. -- text size: 12
  305. -- style flags: 0
  306. -- line height: 16
  307. -- part name: 
  308. ----- HyperTalk script -----
  309. on mouseUp
  310.   groupThree
  311. end mouseUp
  312.  
  313.  
  314.  
  315. -- part contents for background part 19
  316. ----- text -----
  317. 12
  318. 12
  319. 12
  320. 12
  321. 12
  322. 11
  323. 12
  324. 12
  325.  
  326. -- part contents for background part 20
  327. ----- text -----
  328. 47
  329. 80
  330. 53
  331. 54
  332. 52
  333. 102
  334. 48
  335. 13
  336.  
  337. -- part contents for background part 21
  338. ----- text -----
  339. Abrosimoff, Michael John
  340. Adams, Bryan
  341. Alexander, Rick
  342.  Alexander, Susan
  343. Allsop, Blair M.
  344. Azimov, Isaac
  345.  Barisoff, Larissa
  346. Bunyan, Paul
  347.  
  348.  
  349.  
  350. -- part contents for background part 22
  351. ----- text -----
  352. Industrial
  353. Academic
  354. Academic
  355. Academic
  356. Academic
  357. Academic
  358. Academic
  359. Commercial
  360.  
  361. -- part contents for background part 23
  362. ----- text -----
  363. 0.0
  364. 0.0
  365. 0.0
  366. 0.0
  367. 0.0
  368. 0.0
  369. 0.0
  370. 0.0
  371.  
  372. -- part contents for background part 24
  373. ----- text -----
  374. 0.0
  375. 0.0
  376. 0.0
  377. 0.0
  378. 0.0
  379. 0.0
  380. 0.0
  381. 0.0
  382.  
  383. -- part contents for background part 25
  384. ----- text -----
  385. 12.0
  386. 12.0
  387. 12.0
  388. 12.0
  389. 12.0
  390. 12.0
  391. 12.0
  392. 12.0
  393.  
  394. -- part contents for card part 15
  395. ----- text -----
  396. RESERVED